10 REM *** THE EDITOR *** BUCK CHILDRESS ***
20 REM *** P.O. BOX 13575 SALEM, OR 97309 ***
30 PRINTCHR$(147)"LOADING AND CHECKING DATA LINE:":J=49152:L=100:C=11
40 PRINTCHR$(19)TAB(31)L:PRINT:FORB=0TOC:READA:IFA<0ORA>255THEN60
50 POKEJ+B,A:X=X+A:NEXTB:READA:IFA=XTHEN70
60 PRINT"ERROR IN DATA LINE:"L:END
70 X=0:J=J+12:L=L+10:IFL<471THEN40
80 PRINT"THE DATA IS OK AND LOADED...":PRINT
90 PRINT"SYS 49152 TO ACTIVATE...":END
100 DATA120,169,22,162,192,141,20,3,142,21,3,169,1164
110 DATA15,162,3,141,24,212,134,252,88,96,173,190,1490
120 DATA193,174,141,2,142,190,193,224,4,240,64,224,1791
130 DATA5,208,11,205,190,193,240,52,32,177,193,76,1582
140 DATA81,192,166,253,164,203,132,253,192,64,240,36,1976
150 DATA228,203,208,17,173,139,2,197,251,240,25,133,1816
160 DATA251,198,252,16,19,169,3,133,252,169,0,162,1624
170 DATA23,157,0,212,202,16,250,169,65,141,4,212,1451
180 DATA76,49,234,166,203,228,254,240,247,134,254,224,2309
190 DATA64,240,241,165,207,141,189,193,164,211,177,209,2201
200 DATA141,187,193,140,188,193,165,209,133,65,165,210,1989
210 DATA133,66,169,32,224,47,208,8,145,209,136,16,1393
220 DATA251,76,151,193,224,44,208,12,145,209,200,196,1909
230 DATA213,144,249,240,247,76,151,193,224,4,208,19,1968
240 DATA196,213,176,165,162,9,202,240,5,200,196,213,1977
250 DATA144,248,132,211,76,151,193,224,5,208,15,192,1799
260 DATA0,240,69,162,9,202,240,238,136,240,235,76,1847
270 DATA197,192,224,3,208,5,160,0,76,182,192,224,1663
280 DATA6,208,30,164,213,177,209,201,32,208,19,136,1603
290 DATA48,15,177,209,201,32,240,247,201,160,208,5,1743
300 DATA173,189,193,208,238,200,76,182,192,224,1,208,2084
310 DATA20,166,214,160,6,232,224,24,144,5,240,25,1460
320 DATA76,81,192,136,208,243,76,137,193,224,7,208,1781
330 DATA15,166,214,240,239,160,6,202,240,107,136,208,1933
340 DATA250,76,137,193,224,33,208,88,166,214,224,24,1837
350 DATA176,218,232,224,25,176,213,181,217,16,247,142,2067
360 DATA192,193,181,217,41,128,157,194,193,232,224,24,1976
370 DATA144,244,240,242,32,101,233,174,192,193,181,217,2193
380 DATA41,15,73,128,149,217,172,192,193,200,185,217,1782
390 DATA0,41,15,24,125,194,193,153,217,0,232,200,1394
400 DATA224,24,144,238,240,236,165,242,41,15,73,128,1770
410 DATA133,242,160,0,132,211,32,124,232,76,151,193,1686
420 DATA224,28,240,3,76,81,192,162,24,165,211,201,1607
430 DATA40,144,3,56,233,40,168,24,32,240,255,32,1267
440 DATA177,193,132,198,132,207,173,187,193,174,189,193,2148
450 DATA240,3,56,233,128,172,188,193,145,65,76,81,1580
460 DATA192,160,0,132,199,132,212,132,216,96,0,255,1726
470 DATA255,1,2,3,4,5,6,0,0,0,0,0,276